| Fail method |
Applies to
TTestCase
Declaration
Procedure Fail(msg :string; errorAddr :Pointer = nil);
Description
Reports a failure to all TestListeners using the provided message.
| Parameters |
| msg | The optional message. |
procedure TTestCase.Fail(msg: string; errorAddr :Pointer = nil);
begin
if errorAddr = nil then
raise __FailureExceptionClass.Create(msg) at CallerAddr
else
raise __FailureExceptionClass.Create(msg) at errorAddr;
End; |
|
|